\(\int \frac {x^7}{a+b x^3+c x^6} \, dx\) [143]
Optimal result
Integrand size = 18, antiderivative size = 636 \[
\int \frac {x^7}{a+b x^3+c x^6} \, dx=\frac {x^2}{2 c}+\frac {\left (b-\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \arctan \left (\frac {1-\frac {2 \sqrt [3]{2} \sqrt [3]{c} x}{\sqrt [3]{b-\sqrt {b^2-4 a c}}}}{\sqrt {3}}\right )}{2^{2/3} \sqrt {3} c^{5/3} \sqrt [3]{b-\sqrt {b^2-4 a c}}}+\frac {\left (b+\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \arctan \left (\frac {1-\frac {2 \sqrt [3]{2} \sqrt [3]{c} x}{\sqrt [3]{b+\sqrt {b^2-4 a c}}}}{\sqrt {3}}\right )}{2^{2/3} \sqrt {3} c^{5/3} \sqrt [3]{b+\sqrt {b^2-4 a c}}}+\frac {\left (b-\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \log \left (\sqrt [3]{b-\sqrt {b^2-4 a c}}+\sqrt [3]{2} \sqrt [3]{c} x\right )}{3\ 2^{2/3} c^{5/3} \sqrt [3]{b-\sqrt {b^2-4 a c}}}+\frac {\left (b+\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \log \left (\sqrt [3]{b+\sqrt {b^2-4 a c}}+\sqrt [3]{2} \sqrt [3]{c} x\right )}{3\ 2^{2/3} c^{5/3} \sqrt [3]{b+\sqrt {b^2-4 a c}}}-\frac {\left (b-\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \log \left (\left (b-\sqrt {b^2-4 a c}\right )^{2/3}-\sqrt [3]{2} \sqrt [3]{c} \sqrt [3]{b-\sqrt {b^2-4 a c}} x+2^{2/3} c^{2/3} x^2\right )}{6\ 2^{2/3} c^{5/3} \sqrt [3]{b-\sqrt {b^2-4 a c}}}-\frac {\left (b+\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \log \left (\left (b+\sqrt {b^2-4 a c}\right )^{2/3}-\sqrt [3]{2} \sqrt [3]{c} \sqrt [3]{b+\sqrt {b^2-4 a c}} x+2^{2/3} c^{2/3} x^2\right )}{6\ 2^{2/3} c^{5/3} \sqrt [3]{b+\sqrt {b^2-4 a c}}}
\]
[Out]
1/2*x^2/c+1/6*ln(2^(1/3)*c^(1/3)*x+(b-(-4*a*c+b^2)^(1/2))^(1/3))*(b+(2*a*c-b^2)/(-4*a*c+b^2)^(1/2))*2^(1/3)/c^
(5/3)/(b-(-4*a*c+b^2)^(1/2))^(1/3)-1/12*ln(2^(2/3)*c^(2/3)*x^2-2^(1/3)*c^(1/3)*x*(b-(-4*a*c+b^2)^(1/2))^(1/3)+
(b-(-4*a*c+b^2)^(1/2))^(2/3))*(b+(2*a*c-b^2)/(-4*a*c+b^2)^(1/2))*2^(1/3)/c^(5/3)/(b-(-4*a*c+b^2)^(1/2))^(1/3)+
1/6*arctan(1/3*(1-2*2^(1/3)*c^(1/3)*x/(b-(-4*a*c+b^2)^(1/2))^(1/3))*3^(1/2))*(b+(2*a*c-b^2)/(-4*a*c+b^2)^(1/2)
)*2^(1/3)/c^(5/3)*3^(1/2)/(b-(-4*a*c+b^2)^(1/2))^(1/3)+1/6*ln(2^(1/3)*c^(1/3)*x+(b+(-4*a*c+b^2)^(1/2))^(1/3))*
(b+(-2*a*c+b^2)/(-4*a*c+b^2)^(1/2))*2^(1/3)/c^(5/3)/(b+(-4*a*c+b^2)^(1/2))^(1/3)-1/12*ln(2^(2/3)*c^(2/3)*x^2-2
^(1/3)*c^(1/3)*x*(b+(-4*a*c+b^2)^(1/2))^(1/3)+(b+(-4*a*c+b^2)^(1/2))^(2/3))*(b+(-2*a*c+b^2)/(-4*a*c+b^2)^(1/2)
)*2^(1/3)/c^(5/3)/(b+(-4*a*c+b^2)^(1/2))^(1/3)+1/6*arctan(1/3*(1-2*2^(1/3)*c^(1/3)*x/(b+(-4*a*c+b^2)^(1/2))^(1
/3))*3^(1/2))*(b+(-2*a*c+b^2)/(-4*a*c+b^2)^(1/2))*2^(1/3)/c^(5/3)*3^(1/2)/(b+(-4*a*c+b^2)^(1/2))^(1/3)
Rubi [A] (verified)
Time = 0.75 (sec) , antiderivative size = 636, normalized size of antiderivative = 1.00, number of
steps used = 14, number of rules used = 8, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.444, Rules used = {1381, 1524, 298, 31, 648, 631,
210, 642} \[
\int \frac {x^7}{a+b x^3+c x^6} \, dx=\frac {\left (b-\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \arctan \left (\frac {1-\frac {2 \sqrt [3]{2} \sqrt [3]{c} x}{\sqrt [3]{b-\sqrt {b^2-4 a c}}}}{\sqrt {3}}\right )}{2^{2/3} \sqrt {3} c^{5/3} \sqrt [3]{b-\sqrt {b^2-4 a c}}}+\frac {\left (\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}+b\right ) \arctan \left (\frac {1-\frac {2 \sqrt [3]{2} \sqrt [3]{c} x}{\sqrt [3]{\sqrt {b^2-4 a c}+b}}}{\sqrt {3}}\right )}{2^{2/3} \sqrt {3} c^{5/3} \sqrt [3]{\sqrt {b^2-4 a c}+b}}-\frac {\left (b-\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \log \left (-\sqrt [3]{2} \sqrt [3]{c} x \sqrt [3]{b-\sqrt {b^2-4 a c}}+\left (b-\sqrt {b^2-4 a c}\right )^{2/3}+2^{2/3} c^{2/3} x^2\right )}{6\ 2^{2/3} c^{5/3} \sqrt [3]{b-\sqrt {b^2-4 a c}}}-\frac {\left (\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}+b\right ) \log \left (-\sqrt [3]{2} \sqrt [3]{c} x \sqrt [3]{\sqrt {b^2-4 a c}+b}+\left (\sqrt {b^2-4 a c}+b\right )^{2/3}+2^{2/3} c^{2/3} x^2\right )}{6\ 2^{2/3} c^{5/3} \sqrt [3]{\sqrt {b^2-4 a c}+b}}+\frac {\left (b-\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \log \left (\sqrt [3]{b-\sqrt {b^2-4 a c}}+\sqrt [3]{2} \sqrt [3]{c} x\right )}{3\ 2^{2/3} c^{5/3} \sqrt [3]{b-\sqrt {b^2-4 a c}}}+\frac {\left (\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}+b\right ) \log \left (\sqrt [3]{\sqrt {b^2-4 a c}+b}+\sqrt [3]{2} \sqrt [3]{c} x\right )}{3\ 2^{2/3} c^{5/3} \sqrt [3]{\sqrt {b^2-4 a c}+b}}+\frac {x^2}{2 c}
\]
[In]
Int[x^7/(a + b*x^3 + c*x^6),x]
[Out]
x^2/(2*c) + ((b - (b^2 - 2*a*c)/Sqrt[b^2 - 4*a*c])*ArcTan[(1 - (2*2^(1/3)*c^(1/3)*x)/(b - Sqrt[b^2 - 4*a*c])^(
1/3))/Sqrt[3]])/(2^(2/3)*Sqrt[3]*c^(5/3)*(b - Sqrt[b^2 - 4*a*c])^(1/3)) + ((b + (b^2 - 2*a*c)/Sqrt[b^2 - 4*a*c
])*ArcTan[(1 - (2*2^(1/3)*c^(1/3)*x)/(b + Sqrt[b^2 - 4*a*c])^(1/3))/Sqrt[3]])/(2^(2/3)*Sqrt[3]*c^(5/3)*(b + Sq
rt[b^2 - 4*a*c])^(1/3)) + ((b - (b^2 - 2*a*c)/Sqrt[b^2 - 4*a*c])*Log[(b - Sqrt[b^2 - 4*a*c])^(1/3) + 2^(1/3)*c
^(1/3)*x])/(3*2^(2/3)*c^(5/3)*(b - Sqrt[b^2 - 4*a*c])^(1/3)) + ((b + (b^2 - 2*a*c)/Sqrt[b^2 - 4*a*c])*Log[(b +
Sqrt[b^2 - 4*a*c])^(1/3) + 2^(1/3)*c^(1/3)*x])/(3*2^(2/3)*c^(5/3)*(b + Sqrt[b^2 - 4*a*c])^(1/3)) - ((b - (b^2
- 2*a*c)/Sqrt[b^2 - 4*a*c])*Log[(b - Sqrt[b^2 - 4*a*c])^(2/3) - 2^(1/3)*c^(1/3)*(b - Sqrt[b^2 - 4*a*c])^(1/3)
*x + 2^(2/3)*c^(2/3)*x^2])/(6*2^(2/3)*c^(5/3)*(b - Sqrt[b^2 - 4*a*c])^(1/3)) - ((b + (b^2 - 2*a*c)/Sqrt[b^2 -
4*a*c])*Log[(b + Sqrt[b^2 - 4*a*c])^(2/3) - 2^(1/3)*c^(1/3)*(b + Sqrt[b^2 - 4*a*c])^(1/3)*x + 2^(2/3)*c^(2/3)*
x^2])/(6*2^(2/3)*c^(5/3)*(b + Sqrt[b^2 - 4*a*c])^(1/3))
Rule 31
Int[((a_) + (b_.)*(x_))^(-1), x_Symbol] :> Simp[Log[RemoveContent[a + b*x, x]]/b, x] /; FreeQ[{a, b}, x]
Rule 210
Int[((a_) + (b_.)*(x_)^2)^(-1), x_Symbol] :> Simp[(-(Rt[-a, 2]*Rt[-b, 2])^(-1))*ArcTan[Rt[-b, 2]*(x/Rt[-a, 2])
], x] /; FreeQ[{a, b}, x] && PosQ[a/b] && (LtQ[a, 0] || LtQ[b, 0])
Rule 298
Int[(x_)/((a_) + (b_.)*(x_)^3), x_Symbol] :> Dist[-(3*Rt[a, 3]*Rt[b, 3])^(-1), Int[1/(Rt[a, 3] + Rt[b, 3]*x),
x], x] + Dist[1/(3*Rt[a, 3]*Rt[b, 3]), Int[(Rt[a, 3] + Rt[b, 3]*x)/(Rt[a, 3]^2 - Rt[a, 3]*Rt[b, 3]*x + Rt[b, 3
]^2*x^2), x], x] /; FreeQ[{a, b}, x]
Rule 631
Int[((a_) + (b_.)*(x_) + (c_.)*(x_)^2)^(-1), x_Symbol] :> With[{q = 1 - 4*Simplify[a*(c/b^2)]}, Dist[-2/b, Sub
st[Int[1/(q - x^2), x], x, 1 + 2*c*(x/b)], x] /; RationalQ[q] && (EqQ[q^2, 1] || !RationalQ[b^2 - 4*a*c])] /;
FreeQ[{a, b, c}, x] && NeQ[b^2 - 4*a*c, 0]
Rule 642
Int[((d_) + (e_.)*(x_))/((a_.) + (b_.)*(x_) + (c_.)*(x_)^2), x_Symbol] :> Simp[d*(Log[RemoveContent[a + b*x +
c*x^2, x]]/b), x] /; FreeQ[{a, b, c, d, e}, x] && EqQ[2*c*d - b*e, 0]
Rule 648
Int[((d_.) + (e_.)*(x_))/((a_) + (b_.)*(x_) + (c_.)*(x_)^2), x_Symbol] :> Dist[(2*c*d - b*e)/(2*c), Int[1/(a +
b*x + c*x^2), x], x] + Dist[e/(2*c), Int[(b + 2*c*x)/(a + b*x + c*x^2), x], x] /; FreeQ[{a, b, c, d, e}, x] &
& NeQ[2*c*d - b*e, 0] && NeQ[b^2 - 4*a*c, 0] && !NiceSqrtQ[b^2 - 4*a*c]
Rule 1381
Int[((d_.)*(x_))^(m_.)*((a_) + (c_.)*(x_)^(n2_.) + (b_.)*(x_)^(n_))^(p_), x_Symbol] :> Simp[d^(2*n - 1)*(d*x)^
(m - 2*n + 1)*((a + b*x^n + c*x^(2*n))^(p + 1)/(c*(m + 2*n*p + 1))), x] - Dist[d^(2*n)/(c*(m + 2*n*p + 1)), In
t[(d*x)^(m - 2*n)*Simp[a*(m - 2*n + 1) + b*(m + n*(p - 1) + 1)*x^n, x]*(a + b*x^n + c*x^(2*n))^p, x], x] /; Fr
eeQ[{a, b, c, d, p}, x] && EqQ[n2, 2*n] && NeQ[b^2 - 4*a*c, 0] && IGtQ[n, 0] && GtQ[m, 2*n - 1] && NeQ[m + 2*n
*p + 1, 0] && IntegerQ[p]
Rule 1524
Int[(((f_.)*(x_))^(m_.)*((d_) + (e_.)*(x_)^(n_)))/((a_) + (b_.)*(x_)^(n_) + (c_.)*(x_)^(n2_)), x_Symbol] :> Wi
th[{q = Rt[b^2 - 4*a*c, 2]}, Dist[e/2 + (2*c*d - b*e)/(2*q), Int[(f*x)^m/(b/2 - q/2 + c*x^n), x], x] + Dist[e/
2 - (2*c*d - b*e)/(2*q), Int[(f*x)^m/(b/2 + q/2 + c*x^n), x], x]] /; FreeQ[{a, b, c, d, e, f, m}, x] && EqQ[n2
, 2*n] && NeQ[b^2 - 4*a*c, 0] && IGtQ[n, 0]
Rubi steps \begin{align*}
\text {integral}& = \frac {x^2}{2 c}-\frac {\int \frac {x \left (2 a+2 b x^3\right )}{a+b x^3+c x^6} \, dx}{2 c} \\ & = \frac {x^2}{2 c}-\frac {\left (b-\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \int \frac {x}{\frac {b}{2}-\frac {1}{2} \sqrt {b^2-4 a c}+c x^3} \, dx}{2 c}-\frac {\left (b+\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \int \frac {x}{\frac {b}{2}+\frac {1}{2} \sqrt {b^2-4 a c}+c x^3} \, dx}{2 c} \\ & = \frac {x^2}{2 c}+\frac {\left (b-\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \int \frac {1}{\frac {\sqrt [3]{b-\sqrt {b^2-4 a c}}}{\sqrt [3]{2}}+\sqrt [3]{c} x} \, dx}{3\ 2^{2/3} c^{4/3} \sqrt [3]{b-\sqrt {b^2-4 a c}}}-\frac {\left (b-\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \int \frac {\frac {\sqrt [3]{b-\sqrt {b^2-4 a c}}}{\sqrt [3]{2}}+\sqrt [3]{c} x}{\frac {\left (b-\sqrt {b^2-4 a c}\right )^{2/3}}{2^{2/3}}-\frac {\sqrt [3]{c} \sqrt [3]{b-\sqrt {b^2-4 a c}} x}{\sqrt [3]{2}}+c^{2/3} x^2} \, dx}{3\ 2^{2/3} c^{4/3} \sqrt [3]{b-\sqrt {b^2-4 a c}}}+\frac {\left (b+\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \int \frac {1}{\frac {\sqrt [3]{b+\sqrt {b^2-4 a c}}}{\sqrt [3]{2}}+\sqrt [3]{c} x} \, dx}{3\ 2^{2/3} c^{4/3} \sqrt [3]{b+\sqrt {b^2-4 a c}}}-\frac {\left (b+\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \int \frac {\frac {\sqrt [3]{b+\sqrt {b^2-4 a c}}}{\sqrt [3]{2}}+\sqrt [3]{c} x}{\frac {\left (b+\sqrt {b^2-4 a c}\right )^{2/3}}{2^{2/3}}-\frac {\sqrt [3]{c} \sqrt [3]{b+\sqrt {b^2-4 a c}} x}{\sqrt [3]{2}}+c^{2/3} x^2} \, dx}{3\ 2^{2/3} c^{4/3} \sqrt [3]{b+\sqrt {b^2-4 a c}}} \\ & = \frac {x^2}{2 c}+\frac {\left (b-\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \log \left (\sqrt [3]{b-\sqrt {b^2-4 a c}}+\sqrt [3]{2} \sqrt [3]{c} x\right )}{3\ 2^{2/3} c^{5/3} \sqrt [3]{b-\sqrt {b^2-4 a c}}}+\frac {\left (b+\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \log \left (\sqrt [3]{b+\sqrt {b^2-4 a c}}+\sqrt [3]{2} \sqrt [3]{c} x\right )}{3\ 2^{2/3} c^{5/3} \sqrt [3]{b+\sqrt {b^2-4 a c}}}-\frac {\left (b-\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \int \frac {1}{\frac {\left (b-\sqrt {b^2-4 a c}\right )^{2/3}}{2^{2/3}}-\frac {\sqrt [3]{c} \sqrt [3]{b-\sqrt {b^2-4 a c}} x}{\sqrt [3]{2}}+c^{2/3} x^2} \, dx}{4 c^{4/3}}-\frac {\left (b-\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \int \frac {-\frac {\sqrt [3]{c} \sqrt [3]{b-\sqrt {b^2-4 a c}}}{\sqrt [3]{2}}+2 c^{2/3} x}{\frac {\left (b-\sqrt {b^2-4 a c}\right )^{2/3}}{2^{2/3}}-\frac {\sqrt [3]{c} \sqrt [3]{b-\sqrt {b^2-4 a c}} x}{\sqrt [3]{2}}+c^{2/3} x^2} \, dx}{6\ 2^{2/3} c^{5/3} \sqrt [3]{b-\sqrt {b^2-4 a c}}}-\frac {\left (b+\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \int \frac {1}{\frac {\left (b+\sqrt {b^2-4 a c}\right )^{2/3}}{2^{2/3}}-\frac {\sqrt [3]{c} \sqrt [3]{b+\sqrt {b^2-4 a c}} x}{\sqrt [3]{2}}+c^{2/3} x^2} \, dx}{4 c^{4/3}}-\frac {\left (b+\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \int \frac {-\frac {\sqrt [3]{c} \sqrt [3]{b+\sqrt {b^2-4 a c}}}{\sqrt [3]{2}}+2 c^{2/3} x}{\frac {\left (b+\sqrt {b^2-4 a c}\right )^{2/3}}{2^{2/3}}-\frac {\sqrt [3]{c} \sqrt [3]{b+\sqrt {b^2-4 a c}} x}{\sqrt [3]{2}}+c^{2/3} x^2} \, dx}{6\ 2^{2/3} c^{5/3} \sqrt [3]{b+\sqrt {b^2-4 a c}}} \\ & = \frac {x^2}{2 c}+\frac {\left (b-\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \log \left (\sqrt [3]{b-\sqrt {b^2-4 a c}}+\sqrt [3]{2} \sqrt [3]{c} x\right )}{3\ 2^{2/3} c^{5/3} \sqrt [3]{b-\sqrt {b^2-4 a c}}}+\frac {\left (b+\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \log \left (\sqrt [3]{b+\sqrt {b^2-4 a c}}+\sqrt [3]{2} \sqrt [3]{c} x\right )}{3\ 2^{2/3} c^{5/3} \sqrt [3]{b+\sqrt {b^2-4 a c}}}-\frac {\left (b-\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \log \left (\left (b-\sqrt {b^2-4 a c}\right )^{2/3}-\sqrt [3]{2} \sqrt [3]{c} \sqrt [3]{b-\sqrt {b^2-4 a c}} x+2^{2/3} c^{2/3} x^2\right )}{6\ 2^{2/3} c^{5/3} \sqrt [3]{b-\sqrt {b^2-4 a c}}}-\frac {\left (b+\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \log \left (\left (b+\sqrt {b^2-4 a c}\right )^{2/3}-\sqrt [3]{2} \sqrt [3]{c} \sqrt [3]{b+\sqrt {b^2-4 a c}} x+2^{2/3} c^{2/3} x^2\right )}{6\ 2^{2/3} c^{5/3} \sqrt [3]{b+\sqrt {b^2-4 a c}}}-\frac {\left (b-\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \text {Subst}\left (\int \frac {1}{-3-x^2} \, dx,x,1-\frac {2 \sqrt [3]{2} \sqrt [3]{c} x}{\sqrt [3]{b-\sqrt {b^2-4 a c}}}\right )}{2^{2/3} c^{5/3} \sqrt [3]{b-\sqrt {b^2-4 a c}}}-\frac {\left (b+\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \text {Subst}\left (\int \frac {1}{-3-x^2} \, dx,x,1-\frac {2 \sqrt [3]{2} \sqrt [3]{c} x}{\sqrt [3]{b+\sqrt {b^2-4 a c}}}\right )}{2^{2/3} c^{5/3} \sqrt [3]{b+\sqrt {b^2-4 a c}}} \\ & = \frac {x^2}{2 c}+\frac {\left (b-\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \tan ^{-1}\left (\frac {1-\frac {2 \sqrt [3]{2} \sqrt [3]{c} x}{\sqrt [3]{b-\sqrt {b^2-4 a c}}}}{\sqrt {3}}\right )}{2^{2/3} \sqrt {3} c^{5/3} \sqrt [3]{b-\sqrt {b^2-4 a c}}}+\frac {\left (b+\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \tan ^{-1}\left (\frac {1-\frac {2 \sqrt [3]{2} \sqrt [3]{c} x}{\sqrt [3]{b+\sqrt {b^2-4 a c}}}}{\sqrt {3}}\right )}{2^{2/3} \sqrt {3} c^{5/3} \sqrt [3]{b+\sqrt {b^2-4 a c}}}+\frac {\left (b-\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \log \left (\sqrt [3]{b-\sqrt {b^2-4 a c}}+\sqrt [3]{2} \sqrt [3]{c} x\right )}{3\ 2^{2/3} c^{5/3} \sqrt [3]{b-\sqrt {b^2-4 a c}}}+\frac {\left (b+\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \log \left (\sqrt [3]{b+\sqrt {b^2-4 a c}}+\sqrt [3]{2} \sqrt [3]{c} x\right )}{3\ 2^{2/3} c^{5/3} \sqrt [3]{b+\sqrt {b^2-4 a c}}}-\frac {\left (b-\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \log \left (\left (b-\sqrt {b^2-4 a c}\right )^{2/3}-\sqrt [3]{2} \sqrt [3]{c} \sqrt [3]{b-\sqrt {b^2-4 a c}} x+2^{2/3} c^{2/3} x^2\right )}{6\ 2^{2/3} c^{5/3} \sqrt [3]{b-\sqrt {b^2-4 a c}}}-\frac {\left (b+\frac {b^2-2 a c}{\sqrt {b^2-4 a c}}\right ) \log \left (\left (b+\sqrt {b^2-4 a c}\right )^{2/3}-\sqrt [3]{2} \sqrt [3]{c} \sqrt [3]{b+\sqrt {b^2-4 a c}} x+2^{2/3} c^{2/3} x^2\right )}{6\ 2^{2/3} c^{5/3} \sqrt [3]{b+\sqrt {b^2-4 a c}}} \\
\end{align*}
Mathematica [C] (verified)
Result contains higher order function than in optimal. Order 9 vs. order 3 in optimal.
Time = 0.02 (sec) , antiderivative size = 70, normalized size of antiderivative = 0.11
\[
\int \frac {x^7}{a+b x^3+c x^6} \, dx=\frac {3 x^2-2 \text {RootSum}\left [a+b \text {$\#$1}^3+c \text {$\#$1}^6\&,\frac {a \log (x-\text {$\#$1})+b \log (x-\text {$\#$1}) \text {$\#$1}^3}{b \text {$\#$1}+2 c \text {$\#$1}^4}\&\right ]}{6 c}
\]
[In]
Integrate[x^7/(a + b*x^3 + c*x^6),x]
[Out]
(3*x^2 - 2*RootSum[a + b*#1^3 + c*#1^6 & , (a*Log[x - #1] + b*Log[x - #1]*#1^3)/(b*#1 + 2*c*#1^4) & ])/(6*c)
Maple [C] (verified)
Result contains higher order function than in optimal. Order 9 vs. order 3.
Time = 0.50 (sec) , antiderivative size = 61, normalized size of antiderivative = 0.10
| | |
method | result | size |
| | |
default |
\(\frac {x^{2}}{2 c}-\frac {\munderset {\textit {\_R} =\operatorname {RootOf}\left (c \,\textit {\_Z}^{6}+\textit {\_Z}^{3} b +a \right )}{\sum }\frac {\left (\textit {\_R}^{4} b +\textit {\_R} a \right ) \ln \left (x -\textit {\_R} \right )}{2 \textit {\_R}^{5} c +b \,\textit {\_R}^{2}}}{3 c}\) |
\(61\) |
risch |
\(\frac {x^{2}}{2 c}+\frac {\munderset {\textit {\_R} =\operatorname {RootOf}\left (c \,\textit {\_Z}^{6}+\textit {\_Z}^{3} b +a \right )}{\sum }\frac {\left (-\textit {\_R}^{4} b -\textit {\_R} a \right ) \ln \left (x -\textit {\_R} \right )}{2 \textit {\_R}^{5} c +b \,\textit {\_R}^{2}}}{3 c}\) |
\(63\) |
| | |
|
|
|
[In]
int(x^7/(c*x^6+b*x^3+a),x,method=_RETURNVERBOSE)
[Out]
1/2*x^2/c-1/3/c*sum((_R^4*b+_R*a)/(2*_R^5*c+_R^2*b)*ln(x-_R),_R=RootOf(_Z^6*c+_Z^3*b+a))
Fricas [B] (verification not implemented)
Leaf count of result is larger than twice the leaf count of optimal. 3402 vs. \(2 (498) = 996\).
Time = 0.49 (sec) , antiderivative size = 3402, normalized size of antiderivative = 5.35
\[
\int \frac {x^7}{a+b x^3+c x^6} \, dx=\text {Too large to display}
\]
[In]
integrate(x^7/(c*x^6+b*x^3+a),x, algorithm="fricas")
[Out]
1/6*((1/2)^(1/3)*(sqrt(-3)*c - c)*((b^4 - 3*a*b^2*c + a^2*c^2 + (b^2*c^5 - 4*a*c^6)*sqrt((b^10 - 10*a*b^8*c +
35*a^2*b^6*c^2 - 50*a^3*b^4*c^3 + 25*a^4*b^2*c^4)/(b^6*c^10 - 12*a*b^4*c^11 + 48*a^2*b^2*c^12 - 64*a^3*c^13)))
/(b^2*c^5 - 4*a*c^6))^(1/3)*log(-(1/2)^(2/3)*(b^10 - 12*a*b^8*c + 52*a^2*b^6*c^2 - 95*a^3*b^4*c^3 + 60*a^4*b^2
*c^4 + sqrt(-3)*(b^10 - 12*a*b^8*c + 52*a^2*b^6*c^2 - 95*a^3*b^4*c^3 + 60*a^4*b^2*c^4) - (b^8*c^5 - 13*a*b^6*c
^6 + 60*a^2*b^4*c^7 - 112*a^3*b^2*c^8 + 64*a^4*c^9 + sqrt(-3)*(b^8*c^5 - 13*a*b^6*c^6 + 60*a^2*b^4*c^7 - 112*a
^3*b^2*c^8 + 64*a^4*c^9))*sqrt((b^10 - 10*a*b^8*c + 35*a^2*b^6*c^2 - 50*a^3*b^4*c^3 + 25*a^4*b^2*c^4)/(b^6*c^1
0 - 12*a*b^4*c^11 + 48*a^2*b^2*c^12 - 64*a^3*c^13)))*((b^4 - 3*a*b^2*c + a^2*c^2 + (b^2*c^5 - 4*a*c^6)*sqrt((b
^10 - 10*a*b^8*c + 35*a^2*b^6*c^2 - 50*a^3*b^4*c^3 + 25*a^4*b^2*c^4)/(b^6*c^10 - 12*a*b^4*c^11 + 48*a^2*b^2*c^
12 - 64*a^3*c^13)))/(b^2*c^5 - 4*a*c^6))^(2/3) + 4*(a^3*b^5 - 5*a^4*b^3*c + 5*a^5*b*c^2)*x) - (1/2)^(1/3)*(sqr
t(-3)*c + c)*((b^4 - 3*a*b^2*c + a^2*c^2 + (b^2*c^5 - 4*a*c^6)*sqrt((b^10 - 10*a*b^8*c + 35*a^2*b^6*c^2 - 50*a
^3*b^4*c^3 + 25*a^4*b^2*c^4)/(b^6*c^10 - 12*a*b^4*c^11 + 48*a^2*b^2*c^12 - 64*a^3*c^13)))/(b^2*c^5 - 4*a*c^6))
^(1/3)*log(-(1/2)^(2/3)*(b^10 - 12*a*b^8*c + 52*a^2*b^6*c^2 - 95*a^3*b^4*c^3 + 60*a^4*b^2*c^4 - sqrt(-3)*(b^10
- 12*a*b^8*c + 52*a^2*b^6*c^2 - 95*a^3*b^4*c^3 + 60*a^4*b^2*c^4) - (b^8*c^5 - 13*a*b^6*c^6 + 60*a^2*b^4*c^7 -
112*a^3*b^2*c^8 + 64*a^4*c^9 - sqrt(-3)*(b^8*c^5 - 13*a*b^6*c^6 + 60*a^2*b^4*c^7 - 112*a^3*b^2*c^8 + 64*a^4*c
^9))*sqrt((b^10 - 10*a*b^8*c + 35*a^2*b^6*c^2 - 50*a^3*b^4*c^3 + 25*a^4*b^2*c^4)/(b^6*c^10 - 12*a*b^4*c^11 + 4
8*a^2*b^2*c^12 - 64*a^3*c^13)))*((b^4 - 3*a*b^2*c + a^2*c^2 + (b^2*c^5 - 4*a*c^6)*sqrt((b^10 - 10*a*b^8*c + 35
*a^2*b^6*c^2 - 50*a^3*b^4*c^3 + 25*a^4*b^2*c^4)/(b^6*c^10 - 12*a*b^4*c^11 + 48*a^2*b^2*c^12 - 64*a^3*c^13)))/(
b^2*c^5 - 4*a*c^6))^(2/3) + 4*(a^3*b^5 - 5*a^4*b^3*c + 5*a^5*b*c^2)*x) + 2*(1/2)^(1/3)*c*((b^4 - 3*a*b^2*c + a
^2*c^2 + (b^2*c^5 - 4*a*c^6)*sqrt((b^10 - 10*a*b^8*c + 35*a^2*b^6*c^2 - 50*a^3*b^4*c^3 + 25*a^4*b^2*c^4)/(b^6*
c^10 - 12*a*b^4*c^11 + 48*a^2*b^2*c^12 - 64*a^3*c^13)))/(b^2*c^5 - 4*a*c^6))^(1/3)*log((1/2)^(2/3)*(b^10 - 12*
a*b^8*c + 52*a^2*b^6*c^2 - 95*a^3*b^4*c^3 + 60*a^4*b^2*c^4 - (b^8*c^5 - 13*a*b^6*c^6 + 60*a^2*b^4*c^7 - 112*a^
3*b^2*c^8 + 64*a^4*c^9)*sqrt((b^10 - 10*a*b^8*c + 35*a^2*b^6*c^2 - 50*a^3*b^4*c^3 + 25*a^4*b^2*c^4)/(b^6*c^10
- 12*a*b^4*c^11 + 48*a^2*b^2*c^12 - 64*a^3*c^13)))*((b^4 - 3*a*b^2*c + a^2*c^2 + (b^2*c^5 - 4*a*c^6)*sqrt((b^1
0 - 10*a*b^8*c + 35*a^2*b^6*c^2 - 50*a^3*b^4*c^3 + 25*a^4*b^2*c^4)/(b^6*c^10 - 12*a*b^4*c^11 + 48*a^2*b^2*c^12
- 64*a^3*c^13)))/(b^2*c^5 - 4*a*c^6))^(2/3) + 2*(a^3*b^5 - 5*a^4*b^3*c + 5*a^5*b*c^2)*x) + (1/2)^(1/3)*(sqrt(
-3)*c - c)*((b^4 - 3*a*b^2*c + a^2*c^2 - (b^2*c^5 - 4*a*c^6)*sqrt((b^10 - 10*a*b^8*c + 35*a^2*b^6*c^2 - 50*a^3
*b^4*c^3 + 25*a^4*b^2*c^4)/(b^6*c^10 - 12*a*b^4*c^11 + 48*a^2*b^2*c^12 - 64*a^3*c^13)))/(b^2*c^5 - 4*a*c^6))^(
1/3)*log(-(1/2)^(2/3)*(b^10 - 12*a*b^8*c + 52*a^2*b^6*c^2 - 95*a^3*b^4*c^3 + 60*a^4*b^2*c^4 + sqrt(-3)*(b^10 -
12*a*b^8*c + 52*a^2*b^6*c^2 - 95*a^3*b^4*c^3 + 60*a^4*b^2*c^4) + (b^8*c^5 - 13*a*b^6*c^6 + 60*a^2*b^4*c^7 - 1
12*a^3*b^2*c^8 + 64*a^4*c^9 + sqrt(-3)*(b^8*c^5 - 13*a*b^6*c^6 + 60*a^2*b^4*c^7 - 112*a^3*b^2*c^8 + 64*a^4*c^9
))*sqrt((b^10 - 10*a*b^8*c + 35*a^2*b^6*c^2 - 50*a^3*b^4*c^3 + 25*a^4*b^2*c^4)/(b^6*c^10 - 12*a*b^4*c^11 + 48*
a^2*b^2*c^12 - 64*a^3*c^13)))*((b^4 - 3*a*b^2*c + a^2*c^2 - (b^2*c^5 - 4*a*c^6)*sqrt((b^10 - 10*a*b^8*c + 35*a
^2*b^6*c^2 - 50*a^3*b^4*c^3 + 25*a^4*b^2*c^4)/(b^6*c^10 - 12*a*b^4*c^11 + 48*a^2*b^2*c^12 - 64*a^3*c^13)))/(b^
2*c^5 - 4*a*c^6))^(2/3) + 4*(a^3*b^5 - 5*a^4*b^3*c + 5*a^5*b*c^2)*x) - (1/2)^(1/3)*(sqrt(-3)*c + c)*((b^4 - 3*
a*b^2*c + a^2*c^2 - (b^2*c^5 - 4*a*c^6)*sqrt((b^10 - 10*a*b^8*c + 35*a^2*b^6*c^2 - 50*a^3*b^4*c^3 + 25*a^4*b^2
*c^4)/(b^6*c^10 - 12*a*b^4*c^11 + 48*a^2*b^2*c^12 - 64*a^3*c^13)))/(b^2*c^5 - 4*a*c^6))^(1/3)*log(-(1/2)^(2/3)
*(b^10 - 12*a*b^8*c + 52*a^2*b^6*c^2 - 95*a^3*b^4*c^3 + 60*a^4*b^2*c^4 - sqrt(-3)*(b^10 - 12*a*b^8*c + 52*a^2*
b^6*c^2 - 95*a^3*b^4*c^3 + 60*a^4*b^2*c^4) + (b^8*c^5 - 13*a*b^6*c^6 + 60*a^2*b^4*c^7 - 112*a^3*b^2*c^8 + 64*a
^4*c^9 - sqrt(-3)*(b^8*c^5 - 13*a*b^6*c^6 + 60*a^2*b^4*c^7 - 112*a^3*b^2*c^8 + 64*a^4*c^9))*sqrt((b^10 - 10*a*
b^8*c + 35*a^2*b^6*c^2 - 50*a^3*b^4*c^3 + 25*a^4*b^2*c^4)/(b^6*c^10 - 12*a*b^4*c^11 + 48*a^2*b^2*c^12 - 64*a^3
*c^13)))*((b^4 - 3*a*b^2*c + a^2*c^2 - (b^2*c^5 - 4*a*c^6)*sqrt((b^10 - 10*a*b^8*c + 35*a^2*b^6*c^2 - 50*a^3*b
^4*c^3 + 25*a^4*b^2*c^4)/(b^6*c^10 - 12*a*b^4*c^11 + 48*a^2*b^2*c^12 - 64*a^3*c^13)))/(b^2*c^5 - 4*a*c^6))^(2/
3) + 4*(a^3*b^5 - 5*a^4*b^3*c + 5*a^5*b*c^2)*x) + 2*(1/2)^(1/3)*c*((b^4 - 3*a*b^2*c + a^2*c^2 - (b^2*c^5 - 4*a
*c^6)*sqrt((b^10 - 10*a*b^8*c + 35*a^2*b^6*c^2 - 50*a^3*b^4*c^3 + 25*a^4*b^2*c^4)/(b^6*c^10 - 12*a*b^4*c^11 +
48*a^2*b^2*c^12 - 64*a^3*c^13)))/(b^2*c^5 - 4*a*c^6))^(1/3)*log((1/2)^(2/3)*(b^10 - 12*a*b^8*c + 52*a^2*b^6*c^
2 - 95*a^3*b^4*c^3 + 60*a^4*b^2*c^4 + (b^8*c^5 - 13*a*b^6*c^6 + 60*a^2*b^4*c^7 - 112*a^3*b^2*c^8 + 64*a^4*c^9)
*sqrt((b^10 - 10*a*b^8*c + 35*a^2*b^6*c^2 - 50*a^3*b^4*c^3 + 25*a^4*b^2*c^4)/(b^6*c^10 - 12*a*b^4*c^11 + 48*a^
2*b^2*c^12 - 64*a^3*c^13)))*((b^4 - 3*a*b^2*c + a^2*c^2 - (b^2*c^5 - 4*a*c^6)*sqrt((b^10 - 10*a*b^8*c + 35*a^2
*b^6*c^2 - 50*a^3*b^4*c^3 + 25*a^4*b^2*c^4)/(b^6*c^10 - 12*a*b^4*c^11 + 48*a^2*b^2*c^12 - 64*a^3*c^13)))/(b^2*
c^5 - 4*a*c^6))^(2/3) + 2*(a^3*b^5 - 5*a^4*b^3*c + 5*a^5*b*c^2)*x) + 3*x^2)/c
Sympy [A] (verification not implemented)
Time = 147.58 (sec) , antiderivative size = 279, normalized size of antiderivative = 0.44
\[
\int \frac {x^7}{a+b x^3+c x^6} \, dx=\operatorname {RootSum} {\left (t^{6} \cdot \left (46656 a^{3} c^{8} - 34992 a^{2} b^{2} c^{7} + 8748 a b^{4} c^{6} - 729 b^{6} c^{5}\right ) + t^{3} \cdot \left (432 a^{4} c^{4} - 1512 a^{3} b^{2} c^{3} + 1107 a^{2} b^{4} c^{2} - 297 a b^{6} c + 27 b^{8}\right ) + a^{5}, \left ( t \mapsto t \log {\left (x + \frac {- 15552 t^{5} a^{4} c^{9} + 27216 t^{5} a^{3} b^{2} c^{8} - 14580 t^{5} a^{2} b^{4} c^{7} + 3159 t^{5} a b^{6} c^{6} - 243 t^{5} b^{8} c^{5} - 72 t^{2} a^{5} c^{5} + 594 t^{2} a^{4} b^{2} c^{4} - 864 t^{2} a^{3} b^{4} c^{3} + 468 t^{2} a^{2} b^{6} c^{2} - 108 t^{2} a b^{8} c + 9 t^{2} b^{10}}{5 a^{5} b c^{2} - 5 a^{4} b^{3} c + a^{3} b^{5}} \right )} \right )\right )} + \frac {x^{2}}{2 c}
\]
[In]
integrate(x**7/(c*x**6+b*x**3+a),x)
[Out]
RootSum(_t**6*(46656*a**3*c**8 - 34992*a**2*b**2*c**7 + 8748*a*b**4*c**6 - 729*b**6*c**5) + _t**3*(432*a**4*c*
*4 - 1512*a**3*b**2*c**3 + 1107*a**2*b**4*c**2 - 297*a*b**6*c + 27*b**8) + a**5, Lambda(_t, _t*log(x + (-15552
*_t**5*a**4*c**9 + 27216*_t**5*a**3*b**2*c**8 - 14580*_t**5*a**2*b**4*c**7 + 3159*_t**5*a*b**6*c**6 - 243*_t**
5*b**8*c**5 - 72*_t**2*a**5*c**5 + 594*_t**2*a**4*b**2*c**4 - 864*_t**2*a**3*b**4*c**3 + 468*_t**2*a**2*b**6*c
**2 - 108*_t**2*a*b**8*c + 9*_t**2*b**10)/(5*a**5*b*c**2 - 5*a**4*b**3*c + a**3*b**5)))) + x**2/(2*c)
Maxima [F]
\[
\int \frac {x^7}{a+b x^3+c x^6} \, dx=\int { \frac {x^{7}}{c x^{6} + b x^{3} + a} \,d x }
\]
[In]
integrate(x^7/(c*x^6+b*x^3+a),x, algorithm="maxima")
[Out]
1/2*x^2/c - integrate((b*x^4 + a*x)/(c*x^6 + b*x^3 + a), x)/c
Giac [F]
\[
\int \frac {x^7}{a+b x^3+c x^6} \, dx=\int { \frac {x^{7}}{c x^{6} + b x^{3} + a} \,d x }
\]
[In]
integrate(x^7/(c*x^6+b*x^3+a),x, algorithm="giac")
[Out]
integrate(x^7/(c*x^6 + b*x^3 + a), x)
Mupad [B] (verification not implemented)
Time = 14.73 (sec) , antiderivative size = 4069, normalized size of antiderivative = 6.40
\[
\int \frac {x^7}{a+b x^3+c x^6} \, dx=\text {Too large to display}
\]
[In]
int(x^7/(a + b*x^3 + c*x^6),x)
[Out]
log((2^(1/3)*((2^(2/3)*(27*a^2*c*x*(b^4 + 8*a^2*c^2 - 6*a*b^2*c) + (27*2^(1/3)*a*b*c^3*(4*a*c - b^2)^2*(-(b^8
+ 16*a^4*c^4 + b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2*b^4*c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c + 5*a^2*b*c^2*(-(4*
a*c - b^2)^3)^(1/2) - 5*a*b^3*c*(-(4*a*c - b^2)^3)^(1/2))/(c^5*(4*a*c - b^2)^3))^(2/3))/2)*(-(b^8 + 16*a^4*c^4
+ b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2*b^4*c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c + 5*a^2*b*c^2*(-(4*a*c - b^2)^3
)^(1/2) - 5*a*b^3*c*(-(4*a*c - b^2)^3)^(1/2))/(c^5*(4*a*c - b^2)^3))^(1/3))/6 - (9*a*b*(b^6 - 12*a^3*c^3 + 19*
a^2*b^2*c^2 - 8*a*b^4*c))/c^2)*(-(b^8 + 16*a^4*c^4 + b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2*b^4*c^2 - 56*a^3*b^
2*c^3 - 11*a*b^6*c + 5*a^2*b*c^2*(-(4*a*c - b^2)^3)^(1/2) - 5*a*b^3*c*(-(4*a*c - b^2)^3)^(1/2))/(c^5*(4*a*c -
b^2)^3))^(2/3))/18 + (a^4*x*(a*c - b^2))/c^2)*(-(b^8 + 16*a^4*c^4 + b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2*b^4*
c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c + 5*a^2*b*c^2*(-(4*a*c - b^2)^3)^(1/2) - 5*a*b^3*c*(-(4*a*c - b^2)^3)^(1/2))
/(54*(64*a^3*c^8 - b^6*c^5 + 12*a*b^4*c^6 - 48*a^2*b^2*c^7)))^(1/3) + log((2^(1/3)*((2^(2/3)*(27*a^2*c*x*(b^4
+ 8*a^2*c^2 - 6*a*b^2*c) + (27*2^(1/3)*a*b*c^3*(4*a*c - b^2)^2*(-(b^8 + 16*a^4*c^4 - b^5*(-(4*a*c - b^2)^3)^(1
/2) + 41*a^2*b^4*c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c - 5*a^2*b*c^2*(-(4*a*c - b^2)^3)^(1/2) + 5*a*b^3*c*(-(4*a*c
- b^2)^3)^(1/2))/(c^5*(4*a*c - b^2)^3))^(2/3))/2)*(-(b^8 + 16*a^4*c^4 - b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2
*b^4*c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c - 5*a^2*b*c^2*(-(4*a*c - b^2)^3)^(1/2) + 5*a*b^3*c*(-(4*a*c - b^2)^3)^(
1/2))/(c^5*(4*a*c - b^2)^3))^(1/3))/6 - (9*a*b*(b^6 - 12*a^3*c^3 + 19*a^2*b^2*c^2 - 8*a*b^4*c))/c^2)*(-(b^8 +
16*a^4*c^4 - b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2*b^4*c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c - 5*a^2*b*c^2*(-(4*a*
c - b^2)^3)^(1/2) + 5*a*b^3*c*(-(4*a*c - b^2)^3)^(1/2))/(c^5*(4*a*c - b^2)^3))^(2/3))/18 + (a^4*x*(a*c - b^2))
/c^2)*(-(b^8 + 16*a^4*c^4 - b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2*b^4*c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c - 5*a^
2*b*c^2*(-(4*a*c - b^2)^3)^(1/2) + 5*a*b^3*c*(-(4*a*c - b^2)^3)^(1/2))/(54*(64*a^3*c^8 - b^6*c^5 + 12*a*b^4*c^
6 - 48*a^2*b^2*c^7)))^(1/3) + x^2/(2*c) - log((a^4*x*(a*c - b^2))/c^2 - (2^(1/3)*(3^(1/2)*1i - 1)*((2^(2/3)*(3
^(1/2)*1i + 1)*(27*a^2*c*x*(b^4 + 8*a^2*c^2 - 6*a*b^2*c) + (27*2^(1/3)*a*b*c^3*(3^(1/2)*1i - 1)*(4*a*c - b^2)^
2*(-(b^8 + 16*a^4*c^4 + b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2*b^4*c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c + 5*a^2*b*
c^2*(-(4*a*c - b^2)^3)^(1/2) - 5*a*b^3*c*(-(4*a*c - b^2)^3)^(1/2))/(c^5*(4*a*c - b^2)^3))^(2/3))/4)*(-(b^8 + 1
6*a^4*c^4 + b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2*b^4*c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c + 5*a^2*b*c^2*(-(4*a*c
- b^2)^3)^(1/2) - 5*a*b^3*c*(-(4*a*c - b^2)^3)^(1/2))/(c^5*(4*a*c - b^2)^3))^(1/3))/12 + (9*a*b*(b^6 - 12*a^3
*c^3 + 19*a^2*b^2*c^2 - 8*a*b^4*c))/c^2)*(-(b^8 + 16*a^4*c^4 + b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2*b^4*c^2 -
56*a^3*b^2*c^3 - 11*a*b^6*c + 5*a^2*b*c^2*(-(4*a*c - b^2)^3)^(1/2) - 5*a*b^3*c*(-(4*a*c - b^2)^3)^(1/2))/(c^5
*(4*a*c - b^2)^3))^(2/3))/36)*((3^(1/2)*1i)/2 + 1/2)*(-(b^8 + 16*a^4*c^4 + b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a
^2*b^4*c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c + 5*a^2*b*c^2*(-(4*a*c - b^2)^3)^(1/2) - 5*a*b^3*c*(-(4*a*c - b^2)^3)
^(1/2))/(54*(64*a^3*c^8 - b^6*c^5 + 12*a*b^4*c^6 - 48*a^2*b^2*c^7)))^(1/3) + log((a^4*x*(a*c - b^2))/c^2 - (2^
(1/3)*(3^(1/2)*1i + 1)*((2^(2/3)*(3^(1/2)*1i - 1)*(27*a^2*c*x*(b^4 + 8*a^2*c^2 - 6*a*b^2*c) - (27*2^(1/3)*a*b*
c^3*(3^(1/2)*1i + 1)*(4*a*c - b^2)^2*(-(b^8 + 16*a^4*c^4 + b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2*b^4*c^2 - 56*
a^3*b^2*c^3 - 11*a*b^6*c + 5*a^2*b*c^2*(-(4*a*c - b^2)^3)^(1/2) - 5*a*b^3*c*(-(4*a*c - b^2)^3)^(1/2))/(c^5*(4*
a*c - b^2)^3))^(2/3))/4)*(-(b^8 + 16*a^4*c^4 + b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2*b^4*c^2 - 56*a^3*b^2*c^3
- 11*a*b^6*c + 5*a^2*b*c^2*(-(4*a*c - b^2)^3)^(1/2) - 5*a*b^3*c*(-(4*a*c - b^2)^3)^(1/2))/(c^5*(4*a*c - b^2)^3
))^(1/3))/12 - (9*a*b*(b^6 - 12*a^3*c^3 + 19*a^2*b^2*c^2 - 8*a*b^4*c))/c^2)*(-(b^8 + 16*a^4*c^4 + b^5*(-(4*a*c
- b^2)^3)^(1/2) + 41*a^2*b^4*c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c + 5*a^2*b*c^2*(-(4*a*c - b^2)^3)^(1/2) - 5*a*b
^3*c*(-(4*a*c - b^2)^3)^(1/2))/(c^5*(4*a*c - b^2)^3))^(2/3))/36)*((3^(1/2)*1i)/2 - 1/2)*(-(b^8 + 16*a^4*c^4 +
b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2*b^4*c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c + 5*a^2*b*c^2*(-(4*a*c - b^2)^3)^(
1/2) - 5*a*b^3*c*(-(4*a*c - b^2)^3)^(1/2))/(54*(64*a^3*c^8 - b^6*c^5 + 12*a*b^4*c^6 - 48*a^2*b^2*c^7)))^(1/3)
- log((a^4*x*(a*c - b^2))/c^2 - (2^(1/3)*(3^(1/2)*1i - 1)*((2^(2/3)*(3^(1/2)*1i + 1)*(27*a^2*c*x*(b^4 + 8*a^2*
c^2 - 6*a*b^2*c) + (27*2^(1/3)*a*b*c^3*(3^(1/2)*1i - 1)*(4*a*c - b^2)^2*(-(b^8 + 16*a^4*c^4 - b^5*(-(4*a*c - b
^2)^3)^(1/2) + 41*a^2*b^4*c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c - 5*a^2*b*c^2*(-(4*a*c - b^2)^3)^(1/2) + 5*a*b^3*c
*(-(4*a*c - b^2)^3)^(1/2))/(c^5*(4*a*c - b^2)^3))^(2/3))/4)*(-(b^8 + 16*a^4*c^4 - b^5*(-(4*a*c - b^2)^3)^(1/2)
+ 41*a^2*b^4*c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c - 5*a^2*b*c^2*(-(4*a*c - b^2)^3)^(1/2) + 5*a*b^3*c*(-(4*a*c -
b^2)^3)^(1/2))/(c^5*(4*a*c - b^2)^3))^(1/3))/12 + (9*a*b*(b^6 - 12*a^3*c^3 + 19*a^2*b^2*c^2 - 8*a*b^4*c))/c^2)
*(-(b^8 + 16*a^4*c^4 - b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2*b^4*c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c - 5*a^2*b*c
^2*(-(4*a*c - b^2)^3)^(1/2) + 5*a*b^3*c*(-(4*a*c - b^2)^3)^(1/2))/(c^5*(4*a*c - b^2)^3))^(2/3))/36)*((3^(1/2)*
1i)/2 + 1/2)*(-(b^8 + 16*a^4*c^4 - b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2*b^4*c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c
- 5*a^2*b*c^2*(-(4*a*c - b^2)^3)^(1/2) + 5*a*b^3*c*(-(4*a*c - b^2)^3)^(1/2))/(54*(64*a^3*c^8 - b^6*c^5 + 12*a
*b^4*c^6 - 48*a^2*b^2*c^7)))^(1/3) + log((a^4*x*(a*c - b^2))/c^2 - (2^(1/3)*(3^(1/2)*1i + 1)*((2^(2/3)*(3^(1/2
)*1i - 1)*(27*a^2*c*x*(b^4 + 8*a^2*c^2 - 6*a*b^2*c) - (27*2^(1/3)*a*b*c^3*(3^(1/2)*1i + 1)*(4*a*c - b^2)^2*(-(
b^8 + 16*a^4*c^4 - b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2*b^4*c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c - 5*a^2*b*c^2*(
-(4*a*c - b^2)^3)^(1/2) + 5*a*b^3*c*(-(4*a*c - b^2)^3)^(1/2))/(c^5*(4*a*c - b^2)^3))^(2/3))/4)*(-(b^8 + 16*a^4
*c^4 - b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2*b^4*c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c - 5*a^2*b*c^2*(-(4*a*c - b^
2)^3)^(1/2) + 5*a*b^3*c*(-(4*a*c - b^2)^3)^(1/2))/(c^5*(4*a*c - b^2)^3))^(1/3))/12 - (9*a*b*(b^6 - 12*a^3*c^3
+ 19*a^2*b^2*c^2 - 8*a*b^4*c))/c^2)*(-(b^8 + 16*a^4*c^4 - b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2*b^4*c^2 - 56*a
^3*b^2*c^3 - 11*a*b^6*c - 5*a^2*b*c^2*(-(4*a*c - b^2)^3)^(1/2) + 5*a*b^3*c*(-(4*a*c - b^2)^3)^(1/2))/(c^5*(4*a
*c - b^2)^3))^(2/3))/36)*((3^(1/2)*1i)/2 - 1/2)*(-(b^8 + 16*a^4*c^4 - b^5*(-(4*a*c - b^2)^3)^(1/2) + 41*a^2*b^
4*c^2 - 56*a^3*b^2*c^3 - 11*a*b^6*c - 5*a^2*b*c^2*(-(4*a*c - b^2)^3)^(1/2) + 5*a*b^3*c*(-(4*a*c - b^2)^3)^(1/2
))/(54*(64*a^3*c^8 - b^6*c^5 + 12*a*b^4*c^6 - 48*a^2*b^2*c^7)))^(1/3)